home *** CD-ROM | disk | FTP | other *** search
- rem $Id: lwp_log.bat 1.1 95/03/21 22:51:04 frotz Exp $
- rem $Source: h:/prod/lwp/patches/rcs/lwp_log.bat $
- rem $Locker: $
-
- rem
- rem LWP_LOG.BAT: LAN WorkPlace installation checker log process.
- rem (C) Copyright 1995 Novell, Inc. All Rights Reserved.
- rem
-
- rem
- rem Called by LWP_CHK.BAT (via _LWPFIND.BAT via _LWPFILE.BAT)
- rem Logs information to the temporary log file: %TEMP%\LWP.LOG
- rem
-
- if (%1%2)==() goto END
- if exist %1%2 set _pth=%1%2
- if exist %1\%2 set _pth=%1\%2
- if exist %_drive%%1\%2 set _pth=%_drive%%1\%2
- if (%_type%)==(0) goto END
- if (%_pth%)==() goto END
- echo %_msg% %_pth%
- if (%_pth%)==(%_DRIVE%%_PATH%\%_FILE%) goto VERSION
-
-
-
-
- :WARNING
- echo NOTE: %_file% found in %1, not %_drive%%_path%>>%temp%\lwp.log
- echo ***********************************************>>%temp%\lwp.log
- goto VERSION
-
-
-
- :VERSION
- echo %_msg% %_pth%:>>%temp%\lwp.log
- if (%os%)==(NWDOS) xdir %_pth% >>%temp%\lwp.log
- if (%os%)==() dir %_pth% >>%temp%\lwp.log
- if (%_vrsn%)==(4.2) version.exe %_pth% >>%temp%\lwp.log
- if (%_vrsn%)==(5) verread.exe %_pth% >>%temp%\lwp.log
- if (%_type%)==(WI) goto CONTENTS
- if (%_type%)==(I) goto CONTENTS
- if (%_type%)==(BAT) goto CONTENTS
- if (%_type%)==(P) goto REVISION
- goto BOTTOM
-
-
-
-
- :REVISION
- find "DOCUMENT REVISION:" %_pth%
- find "DOCUMENT REVISION:" %_pth% >>%temp%\lwp.log
- goto BOTTOM
-
-
-
-
- :CONTENTS
- echo ============================== >>%temp%\lwp.log
- type %_pth% >>%temp%\lwp.log
- echo ============================== >>%temp%\lwp.log
- goto BOTTOM
-
-
-
- :BOTTOM
- echo.>>%temp%\lwp.log
- echo.>>%temp%\lwp.log
- :END
-